	// Macro pour analyser des photos type noyau cellulaire en DAPI. Photos (16 bit) ranges dans un dossier. Des fentres pop-up demanderont les caractristiques danalyses. 
	//Attention il faut avoir charg le pluging Nucleus counter.


// Dossier des donnes  analyser

	dir = getDirectory("Dossier images  analyser ");
	list = getFileList(dir);

// Dossier de sauvegarde des donnes
	Sauve= getDirectory("Dossier de sauvegarde ");


//crer une boite de dialogue

	Dialog.create("Slection des paramtres");

		Dialog.addNumber("Taille Threshold_Mini ", 355);
		Dialog.addNumber("Taille Threshold_Maxi ", 4095);
		Dialog.addNumber("Nucleus_Mini", 1);
		Dialog.addNumber("Nucleus_Maxi", 100000);
//Dialog.addNumber("taille median", 10);
		Dialog.show();

//dans l'ordre de la demande dans la boite a dialogue

		Taille_Threshold_Mini=Dialog.getNumber();
		Taille_Threshold_Maxi=Dialog.getNumber();
		Nucleus_Mini=Dialog.getNumber();
		Nucleus_Maxi=Dialog.getNumber();

for (i=0;i<list.length; i++) {
        path = dir+list[i];
        showProgress(i, list.length);
        if (!endsWith(path,"/")) open(path);
        if (nImages>=1) 
{

selectWindow(list[i]);

setThreshold(Taille_Threshold_Mini,Taille_Threshold_Maxi);
run("Convert to Mask");

run("Nucleus Counter", "smallest="+Nucleus_Mini+  " largest="+Nucleus_Maxi+  " threshold=Current smooth=[Median 3x3] watershed");

//il est possible dutiliser une variante.
//run("Analyze Particles...", "size="+Nucleus_Mini+"-"+Nucleus_Maxi+  "pixel add slice");


selectWindow("Result of Analysis");
run("Measure");
selectWindow("Result of Analysis");

saveAs("Results", Sauve+"\\" +list[i]+ ".xls");
run("Window Closer"); 
}}








00// Jrme CHAPUIS Mars 2016





